home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interactive Media Design Review 1999
/
Interactive Media Design Review 1999.iso
/
pc
/
Demos
/
Herois
/
Codigo.Cst
/
00009_Script_Frame Creditos
< prev
next >
Wrap
Text File
|
1999-03-19
|
2KB
|
83 lines
property pronto
on exitFrame
if the frame > marker("creditos") then
go the frame
else
cursor -1
end if
end
on getBehaivorDescription
return "Pause na saida do frame, chamando #idleSprite para todos sprites durante #idle"
end
on idle
global gMustUpdate
set gMustUpdate to false
sendAllSprites(#idleSprite)
if gMustUpdate then updateStage
global gLocalTimer
set t = the timer - gLocalTimer
if t > 1450 then
saiDoFrame
else if t > 1140 and not pronto then
set the subliminar of sprite 5 to "AberturaCimaPrim"
set the subliminar of sprite 7 to "AberturaCimaPrim"
set the subliminar of sprite 6 to "AberturaApresentam"
repeat with i = 5 to 7
set the deltaSubliminar of sprite i to 0
sendSprite i, #inicializaAnima
end repeat
set pronto = true
end if
end
on mouseUp
saiDoFrame
end
on saiDoFrame
-- Aguarda um instantinho
cursor 4
sendAllSprites(#cleanSprite)
unloadMember member "AberturaCima", member "AberturaBaixoUlt3"
preload marker("Menu"), marker("Menu")
preloadMember "NoisePrim", "NoiseUlt"
puppetSound 2, 0
set the volume of sound 2 to 255
sound fadeOut 1,120
global gFundoTempo
set gFundoTempo = the timer + 120
cursor -1
go frame "Menu"
end
on enterFrame
global myMemSize
if the frame = marker("Creditos") then
sound fadeOut 2,600
cursor 4
if myMemSize < 18 * 1024 * 1024 then
repeat with i = 5 to 7
set the memberUlt of sprite i to "AberturaShort"
sendSprite i, #inicializaAnima
end repeat
-- Preloads basicos do CD
preloadMember member "AberturaCima", member "AberturaApresentam"
preloadMember member "AberturaCimaPrim", member "AberturaShort"
else
preloadMember member "AberturaCima", member "AberturaApresentam"
preloadMember member "AberturaCimaPrim", member "AberturaBaixoUlt3"
end if
global gLocalTimer
set gLocalTimer = the timer
set pronto = false
set the volume of sound 1 to 255
puppetSound 1, "SomCreditos"
sound fadeIn 1, 120
end if
end